home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 September (IDG) / Sep99.iso / Shareware World / Comms & Internet / LinkConverter 1.1.2 / Dialog Director v0.7 / Examples / Open In Bkgnd.as < prev    next >
Encoding:
Text File  |  1998-01-18  |  892 b   |  18 lines  |  [TEXT/ToyS]
  1. property isGreyscale : true
  2. OpenDialog(standard dialog, "A standard, modal dialog box.")
  3. OpenDialog(standard window, "A standard, movable document window.")
  4. OpenDialog(movable dialog, "A movable dialog box.")
  5. OpenDialog(standard palette, "A movable palette style window.")
  6. OpenDialog(plain dialog, "A plain dialog box.")
  7. OpenDialog(sideways palette, "A movable sideways palette style window.")
  8. OpenDialog(shadowed dialog, "A shadowed, modal dialog box.")
  9.  
  10. on OpenDialog(wStyle, msg)
  11.     tell application "Finder" to activate
  12.     dd auto dialog {size:[320, 95], style:wStyle, name:msg, contents:[¬
  13.         {class:push button, bounds:[250, 65, 310, 85], name:"OK"}, ¬
  14.         {class:push button, bounds:[170, 65, 230, 85], name:"Cancel"}, ¬
  15.         {class:static text, bounds:[10, 10, 310, 10 + 32], contents:msg} ¬
  16.             ]} grayscale isGreyscale
  17.     if result's item 2 then error number -128 -- Exit silently
  18. end OpenDialog